home *** CD-ROM | disk | FTP | other *** search
/ Language/OS - Multiplatform Resource Library / LANGUAGE OS.iso / icon / packages.lha / packages / atari / ats.arc / TESTS.ARC / MEM01.ICN < prev    next >
Text File  |  1990-03-28  |  170b  |  5 lines
  1. procedure main()
  2.    write(image(every repl(repl("xxx",50),write(1 to 100))) | "failed")
  3.    write(image(repl(repl(repl(repl(&cset,100),100),100),100)) | "failed")
  4. end
  5.